home *** CD-ROM | disk | FTP | other *** search
/ Merciful 1 / Merciful - Disc 1.iso / software / j / jet_master / jetmaster1.dms / in.adf / Scripts / SOutline_96.Script < prev    next >
Encoding:
Text File  |  1988-12-27  |  686 b   |  22 lines
  1. ; Shadow Outline Script - density 6
  2. ;
  3. ; We need a raster block 8 dots wider and 6 dots higher
  4. magx 8, magy 6
  5. ; Extend font width and height parameters as well.
  6. fw 8, fh 6
  7. ; Each character is 6 dots wider in the x direction at least.
  8. dx 24
  9. ; Allocate Raster
  10. AR
  11. ; Draw diagnally
  12. gt 0 0, d 1, gt 1 1, d 1, gt 2 2, d 1, gt 3 3
  13. d 1, gt 4 4, d 1, gt 5 5, d 1, gt 6 6, d 1
  14. ; skip over x+1 and do the same diagnal.
  15. gt 1 0, d 1, gt 2 1, d 1, gt 3 2, d 1, gt 4 3,
  16. d 1, gt 5 4, d 1, gt 6 5, d 1, gt 7 6, d 1
  17. ; skip over x+2 and do the same diagnal.
  18. gt 2 0, d 1, gt 3 1, d 1, gt 4 2, d 1, gt 5 3
  19. d 1, gt 6 4, d 1, gt 7 5, d 1, gt 8 6, d 1
  20. ; draw the outline of character at top center.
  21. gt 2 1, d 0
  22.